Click the map to view different land uses:
# Read in land use data
land_use <- read_sf("Land_Use_Land_Cover_LULC")
# Rename land use column for better display
land_better <- land_use %>%
rename("Land Use Type:" = landcover)
# Make interactive map of Hawaii land use data
tmap_mode("view")
tm_shape(land_better) +
tm_basemap("Esri.WorldStreetMap") +
tm_fill("Land Use Type:", legend.show = FALSE)